(custom-save-all): Use find-file-visit-truename for visiting the custom file.

diff --git a/lisp/cus-edit.el b/lisp/cus-edit.el
index af4cc43daec1a7f9c2d40a30d664eeeaefa6382b..d698aaeecc36878f877cf1b18b9adfbfdcfa5300 100644 (file)
--- a/lisp/cus-edit.el
+++ b/lisp/cus-edit.el
@@ -4193,7 +4193,8 @@ if only the first line of the docstring is shown."))
                                            "\\'")
                                    recentf-exclude)))
         (old-buffer (find-buffer-visiting filename)))
-    (with-current-buffer (or old-buffer (find-file-noselect filename))
+    (with-current-buffer (let ((find-file-visit-truename t))
+                          (or old-buffer (find-file-noselect filename)))
       (unless (eq major-mode 'emacs-lisp-mode)
        (emacs-lisp-mode))
       (let ((inhibit-read-only t))